home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Merciful 2
/
Merciful - Disc 2.iso
/
software
/
h
/
highspeedpascalv2.0b.dms
/
highspeedpascalv2.0b.adf
/
Interface
/
Potgo.pas
< prev
next >
Wrap
Pascal/Delphi Source File
|
1992-01-16
|
290b
|
27 lines
Unit Potgo;
Interface
Uses Exec;
Type
pLibrary = ^tLibrary;
Var
PotgoBase: pLibrary;
Const
POTGONAME = 'potgo.resource';
Function AllocPotBits (bits: Integer): Integer;
Procedure FreePotBits (bits: Integer);
Procedure WritePotgo
(word: Integer;
mask: Integer);
End.